object CustForm: TCustForm
  Left = 245
  Top = 130
  Width = 870
  Height = 500
  Caption = #36134#25143#26597#35810
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object grpCust: TGroupBox
    Left = 0
    Top = 0
    Width = 862
    Height = 57
    Align = alTop
    TabOrder = 0
    object lblCust: TLabel
      Left = 17
      Top = 24
      Width = 56
      Height = 13
      Caption = #36134#25143#21495#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object medtCustNo: TMaskEdit
      Left = 85
      Top = 21
      Width = 164
      Height = 21
      EditMask = '!9999999999;1; '
      ImeName = 'Chinese (Simplified) - US Keyboard'
      MaxLength = 10
      TabOrder = 0
      Text = '          '
    end
    object btnQuery: TButton
      Left = 360
      Top = 21
      Width = 75
      Height = 23
      Caption = #26597#35810
      TabOrder = 1
      OnClick = btnQueryClick
    end
    object btnPrint: TButton
      Left = 464
      Top = 20
      Width = 75
      Height = 24
      Caption = #25171#21360'(&P)'
      TabOrder = 2
      OnClick = btnPrintClick
    end
  end
  object cxGrid1: TcxGrid
    Left = 0
    Top = 57
    Width = 862
    Height = 416
    Align = alClient
    TabOrder = 1
    object tvCust: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = srcCust
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsView.GroupByBox = False
      object tvCustAccountNo: TcxGridDBColumn
        Caption = #36134#25143
        DataBinding.FieldName = 'AccountNo'
        Options.Editing = False
        Options.Filtering = False
      end
      object tvCustNetID: TcxGridDBColumn
        Caption = #32593#32476#21495
        DataBinding.FieldName = 'NetID'
        Options.Editing = False
        Options.Filtering = False
        Options.Grouping = False
        Options.Moving = False
        Width = 56
      end
      object tvCustAccountName: TcxGridDBColumn
        Caption = #36134#25143#21517
        DataBinding.FieldName = 'AccountName'
        Options.Editing = False
        Options.Filtering = False
        Options.Grouping = False
        Options.Moving = False
      end
      object tvCustRoadNo: TcxGridDBColumn
        Caption = #36335#27573
        DataBinding.FieldName = 'RoadNo'
        PropertiesClassName = 'TcxLookupComboBoxProperties'
        Properties.KeyFieldNames = 'ROADID'
        Properties.ListColumns = <
          item
            FieldName = 'ROADNAME'
          end>
        Properties.ListSource = srcRoad
        Options.Editing = False
        Options.Filtering = False
        Options.Grouping = False
        Options.Moving = False
        Width = 127
      end
      object tvCustBalance: TcxGridDBColumn
        Caption = #24403#21069#20313#39069
        DataBinding.FieldName = 'Balance'
        PropertiesClassName = 'TcxCurrencyEditProperties'
        Options.Editing = False
        Options.Filtering = False
        Options.Grouping = False
        Options.Moving = False
      end
      object tvCustStaus: TcxGridDBColumn
        Caption = #27880#38144#29366#24577
        DataBinding.FieldName = 'Status'
        Options.Grouping = False
        Options.Moving = False
      end
      object tvCustAccountType: TcxGridDBColumn
        Caption = #36134#25143#31867#22411
        DataBinding.FieldName = 'AccountType'
        PropertiesClassName = 'TcxLookupComboBoxProperties'
        Properties.KeyFieldNames = 'CardType'
        Properties.ListColumns = <
          item
            FieldName = 'TypeName'
          end>
        Properties.ListSource = srcCardType
        Options.Editing = False
        Options.Grouping = False
        Options.Moving = False
      end
      object tvCustAlterCash: TcxGridDBColumn
        Caption = #39044#35686#37329#39069
        DataBinding.FieldName = 'AlterCash'
        PropertiesClassName = 'TcxCurrencyEditProperties'
        Options.Filtering = False
        Options.ShowEditButtons = isebNever
        Width = 90
      end
    end
    object glCust: TcxGridLevel
      GridView = tvCust
    end
  end
  object srcCust: TDataSource
    DataSet = tblCust
    Left = 560
    Top = 120
  end
  object adsRoad: TMSQuery
    Connection = MainForm.connSQL
    SQL.Strings = (
      'select * from TS_FreeRoad')
    CursorType = ctStatic
    CommandTimeout = 30000
    Left = 712
    Top = 8
  end
  object srcRoad: TDataSource
    DataSet = adsRoad
    Left = 664
    Top = 8
  end
  object dxComponentPrinter: TdxComponentPrinter
    CurrentLink = dxComponentPrinterLink
    DateFormat = 1
    ExplorerStubLink = dxComponentPrinterLink
    Version = 0
    Left = 432
    Top = 136
    object dxComponentPrinterLink: TdxGridReportLink
      Active = True
      Component = cxGrid1
      PrinterPage.DMPaper = 9
      PrinterPage.Footer = 6350
      PrinterPage.GrayShading = True
      PrinterPage.Header = 6350
      PrinterPage.Margins.Bottom = 12700
      PrinterPage.Margins.Left = 12700
      PrinterPage.Margins.Right = 12700
      PrinterPage.Margins.Top = 12700
      PrinterPage.Orientation = poLandscape
      PrinterPage.PageFooter.CenterTitle.Strings = (
        '[Page # of Pages #]')
      PrinterPage.PageFooter.Font.Charset = DEFAULT_CHARSET
      PrinterPage.PageFooter.Font.Color = clWindowText
      PrinterPage.PageFooter.Font.Height = -11
      PrinterPage.PageFooter.Font.Name = 'Tahoma'
      PrinterPage.PageFooter.Font.Style = []
      PrinterPage.PageHeader.CenterTitle.Strings = (
        '[User Name]')
      PrinterPage.PageHeader.Font.Charset = DEFAULT_CHARSET
      PrinterPage.PageHeader.Font.Color = clWindowText
      PrinterPage.PageHeader.Font.Height = -11
      PrinterPage.PageHeader.Font.Name = 'Tahoma'
      PrinterPage.PageHeader.Font.Style = []
      PrinterPage.PageHeader.LeftTitle.Strings = (
        '[Date & Time Printed]')
      PrinterPage.PageSize.X = 210000
      PrinterPage.PageSize.Y = 297000
      PrinterPage._dxMeasurementUnits_ = 0
      PrinterPage._dxLastMU_ = 2
      ReportDocument.Caption = 'New Report'
      ReportDocument.CreationDate = 40549.360834062500000000
      ReportTitle.Font.Charset = ANSI_CHARSET
      ReportTitle.Font.Color = clWindowText
      ReportTitle.Font.Height = -48
      ReportTitle.Font.Name = #23435#20307
      ReportTitle.Font.Style = []
      ReportTitle.Mode = tmOnFirstPage
      ReportTitle.Text = #39044#20184#21345#23545#24080#25253#34920#13#10
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      OptionsCards.Shadow.Color = clBlack
      OptionsExpanding.ExpandGroupRows = True
      OptionsExpanding.ExpandMasterRows = True
      OptionsOnEveryPage.Footers = False
      OptionsSize.AutoWidth = True
      BuiltInReportLink = True
    end
  end
  object tblcardType: TMSTable
    TableName = 'TS_CardType'
    Connection = MainForm.connSQL
    Left = 352
    Top = 208
  end
  object srcCardType: TDataSource
    DataSet = tblcardType
    Left = 296
    Top = 208
  end
  object tblCust: TMSTable
    TableName = 'TS_Account'
    Connection = MainForm.connSQL
    Left = 600
    Top = 128
  end
end
